home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / dec94 / cj_fig01.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  9KB  |  550x363  |  4-bit (5 colors)
Labels: text | electronics | screenshot | display | software | number | font
OCR: MENUO.FSL :: #Form1 :: open* method open(var eventInfo Event) var r PopupMenu m Menu endVar if eventInfo.isPreFilter() then ;// This code executes for each object on the form: else ;// This code executes only for the form: r.addText("&First\tCtrl-F12", MenuEnabled , UserMenu + 20) r . addText ("&Last\tCtrl-F11", MenuEnabled , UserMenu + 21) r . addText("&Next\tF12", MenuEnabled , UserMenu + 22) r . addText ("&Previous\tF11", MenuEnabled , UserMenu + 23) m. addPopup("&Record",r) m. show( ) endIf endmethod Edit Line: 14 Col: 34